home *** CD-ROM | disk | FTP | other *** search
/ ftp2.jacobs.com / 2015.02.ftp2.jacobs.com.tar / ftp2.jacobs.com / pub / iPass / Open Mobile-V2.3.0-11624-V9.000.msi / Data1.cab / _F3D8E3BFEE5FA8EE1AC3F4E5C684A932 < prev    next >
Text File  |  2012-10-24  |  819b  |  42 lines
  1. ; iPass Dial-Up Networking Script
  2. ;
  3. ; Copyright (C) 1997-2000 iPass Inc.
  4. ;
  5. ; Do not edit this script.  Connection to the
  6. ; remote access points requires this script.
  7. ;
  8. ; Future auto-updates of this script will not
  9. ; occur when editions are made to this script.
  10. ;
  11. proc main
  12.     integer count = 0
  13.     transmit "^M"
  14.     delay 1
  15.     transmit "^M"
  16.     delay 1
  17.     transmit "^M"
  18.     delay 1
  19.     while count < 5 do
  20.      transmit "^M"
  21.         waitfor "in:" until 2
  22.         if $SUCCESS then
  23.         goto DoLogin
  24.         endif
  25.         count = count + 1
  26.     endwhile
  27.     halt
  28. DoLogin:
  29. ;    delay 1
  30.     transmit $USERID, raw
  31.     transmit "^M"
  32.     waitfor "word: " until 2
  33.     transmit $PASSWORD, raw
  34.     transmit "^M"
  35.     waitfor "ppp" until 10
  36.      if $FAILURE then
  37.      goto Fail
  38.      endif
  39. Fail:
  40. endproc
  41.  
  42.